home *** CD-ROM | disk | FTP | other *** search
/ Deutsche Edition 1 / Deutsche Edition 1.iso / amok / 011-020 / amok12 / module / xdos.def < prev    next >
Text File  |  1993-11-04  |  1KB  |  42 lines
  1. (*---------------------------------------------------------------------------
  2.     :Program.    XDos.def
  3.     :Author.     Bernd Preusing
  4.     :Address.    Gerhardstr. 16  D-2200 Elmshorn
  5.     :Phone.      04121/22486
  6.     :Shortcut.   [bep]
  7.     :Version.    1.0
  8.     :Date.       12-Oct-88
  9.     :Copyright.  PD
  10.     :Language.   Modula-II
  11.     :Translator. M2Amiga
  12.     :Imports.    ---
  13.     :UpDate.     ---
  14.     :Contents.   Allows full access to undocumented(?) AmigaDos functions
  15.     :Remark.     This must be converted to a real library module with
  16.          ConvLibSym!
  17.          Use these procedures on your own risk!
  18.          Some are used by Terminal.mod.
  19. ---------------------------------------------------------------------------*)
  20. (* $M- dos.library *)
  21. DEFINITION MODULE XDos;
  22.  
  23. FROM SYSTEM IMPORT ADDRESS;
  24.  
  25. PROCEDURE XDos1(Code{0}, arg1{1}:ADDRESS): LONGINT;
  26. CODE -28;
  27.  
  28. PROCEDURE XDos2(Code{0}, arg1{1}, arg2{2}:ADDRESS): LONGINT;
  29. CODE -28;
  30.  
  31. PROCEDURE XDos3(Code{0}, arg1{1}, arg2{2}, arg3{3}:ADDRESS): LONGINT;
  32. CODE -28;
  33.  
  34. PROCEDURE XDos4(Code{0}, arg1{1}, arg2{2}, arg3{3}, arg4{4}:ADDRESS): LONGINT;
  35. CODE -28;
  36.  
  37. PROCEDURE XDos5(Code{0},
  38.          arg1{1}, arg2{2}, arg3{3}, arg4{4}, arg5{5}:ADDRESS): LONGINT;
  39. CODE -28;
  40.  
  41. END XDos.def
  42.